#declare KuenSurface = parametric {
   function (2*sqrt(1+u^2)*cos(u-atan2(u,1))*sin(v))/(1+u^2*sin(v)^2),
            (2*sqrt(1+u^2)*sin(u-atan2(u,1))*sin(v))/(1+u^2*sin(v)^2),
            log(tan(.5*v))+(2*cos(v))/(1+u^2+sin(v)^2)
   <0,0>,<2*pi,pi>
   <-5,-5,-5>,<5,5,5>
}

any help appreciated :-)

--
David Fontaine     <dav### [at] faricynet>     ICQ 55354965
Please visit my website: http://www.faricy.net/~davidf/

Post a reply to this message